home *** CD-ROM | disk | FTP | other *** search
/ Freaks Macintosh Archive / Freaks Macintosh Archive.bin / Freaks Macintosh Archives / Ham⁄GPS / SoftKiss.src.1.8 Folder / SoftKiss.src.1.8 / core / sfk_core_kiss_asm.c < prev    next >
Text File  |  1992-06-21  |  885b  |  38 lines
  1. /*
  2.  * SoftKiss - kiss mode emulator
  3.  * by Aaron Wohl / N3LIW (aw0g+@andrew.cmu.edu) jul 1990
  4.  * 6393 Penn Ave #303
  5.  * Pittsburgh PA, 15206
  6.  * work: (412)-268-5032
  7.  * home: (412)-731-6159
  8.  */
  9.  
  10. #include "sfk_core.h"
  11. #include "sfk_core_private.h"
  12.  
  13. /*
  14.  * turn off prototype synce asm routines need to lie about there arguments
  15.  * in order to ovid being given a stack frame by the compiler
  16.  */
  17. #pragma options(!require_protos)
  18.  
  19. enum { JIODone = 0x8FC  };      /*[GLOBAL VAR] Jump vector for IODone function*/
  20.  
  21. /*
  22.  * call the os routine jiodone
  23.  * static void do_jiodone(kiss_port_pt p)
  24.  */
  25. void rp_jiodone(void)
  26. {
  27.     asm {
  28.         move.l 4(sp),a1
  29. #ifdef NOT_NEEDED
  30.         move.l sfk_prt.krp_pb(a1),a0    /*iopb to finish*/
  31. #endif
  32.         clr.l kiss_port.kp_pb(a1)        /*mark it done*/
  33.         move.l kiss_port.kp_de(a1),a1    /*dce for device*/
  34.         move.l (a1),a1
  35.         move.l JIODone,-(a7)             /*not immidiate and are done*/
  36.     }
  37. }
  38.